count_table_cov_size <- sweep(count_table_cov, 1, genome_read_sizes, "/")
count_table_cov_size_rel <- count_table_cov_size %>%
rownames_to_column("Genome") %>%
mutate_at(vars(-Genome),~./sum(.)) #TSS normalisation
count_filtered <- column_to_rownames(count_table_cov_size_rel, "Genome")
| Region | Mean | SD |
|---|---|---|
| Daneborg | 106.233 | 21.418 |
| Ittoqqortoormii | 98.915 | 36.302 |
I used my taxonomy file from the last script, as I could not find a file that had the variable “user_genome” is that OK?
Create Merge table and GIFT elements for Ittoq dogs
Create Merge table and GIFT elements for Daneborg dogs